Make 's' in *Help* work for Lisp-defined variables again

* lisp/help-fns.el (describe-variable): Make the `s' command work
for Lisp-defined variables again (bug#39121).

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 7641774615d178f97341116c5a2a0342ea1c47e0..d7fb038f45acd86eca438a25e1530409917313ef 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -1078,7 +1078,9 @@ it is displayed along with the global value."
                           (with-current-buffer standard-output
                              (setq help-mode--current-data
                                    (list :symbol variable
-                                         :type 'variable
+                                         :type (if (eq file-name 'C-source)
+                                                   'variable
+                                                 'defvar)
                                          :file file-name))
                              (save-excursion
                               (re-search-backward (substitute-command-keys